home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / keys.arc / KEYS.ASM next >
Encoding:
Assembly Source File  |  1985-03-30  |  634 b   |  32 lines
  1. monitor_segment    segment    at (0f000h)
  2. key_buff_segment    equ    0c8h
  3. key_buff_start        equ    0cah
  4. key_buff_end        equ    0cch
  5. free_mem        equ    2000h
  6. end_mem            equ    3fffh
  7. monitor_segment    ends
  8.  
  9. data_segment    segment    at (40h)
  10. key_head_ptr        equ    1ah
  11. key_tail_ptr        equ    1ch
  12. data_segment    ends
  13.  
  14. code segment public
  15.  
  16.     assume    cs:code, ds:data_segment, es:monitor_segment
  17.  
  18.     org    100h
  19. bgkbf:    mov    ax,monitor_segment
  20.     mov    es,ax
  21.     mov    ax,data_segment
  22.     mov    ds,ax
  23.     mov    es:key_buff_segment,0f000h
  24.     mov    ds:key_head_ptr,free_mem
  25.     mov    ds:key_tail_ptr,free_mem
  26.     mov    es:key_buff_start,free_mem
  27.     mov    es:key_buff_end,end_mem
  28.     ret
  29.  
  30. code ends
  31.  
  32.     end    bgkbf